home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Belgian Amiga Club - ADF Collection
/
BS1 part 68.7z
/
BS1 part 68
/
Sisthema Personal v2.5 (1993)(Hobby - Work)(IT)[cr OTL].7z
/
Sisthema Personal v2.5 (1993)(Hobby - Work)(IT)[cr OTL].adf
/
Installa_STH
< prev
next >
Wrap
AmigaDOS Script File
|
1993-09-27
|
2KB
|
63 lines
.key dest
if "<dest>" EQ ""
ECHO "*N*e[1mA T T E N Z I O N E !*e[0m"
ECHO "*NNon conosco la partizione su cui installare il programma!"
ECHO "*NConsultare *e[33mAiuto_Installazione*e[0m per le istruzioni"
ASK "*NPremi Return per uscire..."
Skip end
endif
ASSIGN DEST: "<dest>"
RESIDENT C:ECHO
ECHO "*N*e[1m» S I S T H E M A P E R S O N A L «*e[0m"
ECHO "-----------------------------------------------------"
ECHO "Procedura di installazione su disco rigido"
ECHO "*N*N*e[32mInstalla_STH*e[31m provvederà ad installare SISTHEMA PERSONAL su *e[33m<dest>*e[31m"
ask "*NIntendi proseguire nell'installazione ? (y/n) "
IF WARN
ECHO "*NCreo il cassetto SISTHEMA_PERSONAL in *e[33m<dest>*e[31m..."
IF NOT EXISTS DEST:SISTHEMA_PERSONAL
MAKEDIR >NIL: DEST:SISTHEMA_PERSONAL
ENDIF
COPY SISTHEMA_PERSONAL:IconaCassetto to DEST:SISTHEMA_PERSONAL.info CLONE
ECHO "*NInstallo SISTHEMA PERSONAL..."
COPY "SISTHEMA_PERSONAL:SISTHEMA PERSONAL#?" to DEST:SISTHEMA_PERSONAL CLONE QUIET
IF NOT EXISTS FONTS:berto
ECHO "*NInstallo il font berto..."
makedir FONTS:berto
copy SISTHEMA_PERSONAL:Fonts/berto to FONTS:berto quiet
copy SISTHEMA_PERSONAL:Fonts/berto.font to FONTS:
ENDIF
IF NOT EXISTS FONTS:helvetica
ECHO "*NInstallo il font helvetica..."
makedir FONTS:helvetica
copy SISTHEMA_PERSONAL:Fonts/helvetica to FONTS:helvetica quiet
copy SISTHEMA_PERSONAL:Fonts/helvetica.font to FONTS:
ENDIF
IF NOT EXISTS FONTS:courier
ECHO "*NInstallo il font courier..."
makedir FONTS:courier
copy SISTHEMA_PERSONAL:Fonts/courier to FONTS:courier quiet
copy SISTHEMA_PERSONAL:Fonts/courier.font to FONTS:
ENDIF
ECHO "*NInstallazione conclusa con successo!"
ECHO "*NGRAZIE PER AVER SCELTO UN PRODOTTO PROGETTO SOFTWARE E BUONA FORTUNA!"
ELSE
ECHO "*NLa procedura di installazione è stata abbandonata."
ENDIF
WAIT 3 secs
lab end
ASSIGN DEST: